Top 10k strings from Ian Botham's Test Match + Superfile (1985)(Tynesoft)(Side B).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Compilations - Utilities & Educational & Various / Sinclair ZX Spectrum - Compilations - Various - [TZX] (TOSEC-v2006-06-06) /

Back to the directory listing

   9 ;"options"
   7 ;"press option number then ENTER":
   7 ;"current file name: ";
   2 ;"enter record number             ":
   2 ;"9....quit"
   2 ;"3...return to main menu"
   2 ,"File name is ";i$:
   2 "s....to stop viewing,"
   2 "enter record number (1 - ";k(13
   1 z2=z2+k(n):
   1 t$=d$(eye)
   1 superfile 
   1 q$=d$(ell,n)
   1 p$=d$(i,h)
   1 p$=d$(eye,n)
   1 m$="                                ":
   1 eye=eye-emm
   1 ell=eye+emm
   1 d$(n,k(ff)
   1 d$(n)=d$(n+1
   1 d$(j,k(ff)
   1 d$(i,h)>96
   1 d$(i,h)<123
   1 d$(i,h)-32
   1 d$(eye,n)>96
   1 d$(eye,n)<123
   1 d$(eye,n)-32
   1 d$(eye)=d$(ell)
   1 d$(ell,n)>96
   1 d$(ell,n)<123
   1 d$(ell,n)-32
   1 d$(ell)=t$
   1 PRINT "a....to alter record number"
   1 IF b$="A" OR b$="a" THEN GO TO 2136
   1 Created with Ramsoft MakeTZX
   1 ;d$(n,k(ff)
   1 ;c$(ff);" from record  1"
   1 ;"record ";n:
   1 ;"record ";j
   1 ;"press s to stop, or any other   key to continue"
   1 ;"press any key";:
   1 ;"press ENTER to view next record,"
   1 ;"press ENTER to continue,"
   1 ;"pres any key";:
   1 ;"options":
   1 ;"on interface 1":
   1 ;"no room for any more records";
   1 ;"no file in memory":
   1 ;"is this OK ? (y/n)              "
   1 ;"enter paper colour"
   1 ;"enter option number then ENTER"
   1 ;"enter file name":
   1 ;"enter field number to be altered"
   1 ;"enter field number (1 - ";k(11
   1 ;"current file name: ";:
   1 ;"View facilities":
   1 ;"Transactions":
   1 ;"This will erase current file.":
   1 ;"Superfile":
   1 ;"Start a new file":
   1 ;"Search facilities":
   1 ;"Printout to  RS232";
   1 ;"Press option number then ENTER":
   1 ;"No more matches. Press any key"
   1 ;"Miscellaneous":
   1 ;"Load and save data file":
   1 ;"Incorrect password, try again"
   1 ;"Enter old password:"
   1 ;"Enter new password:":
   1 ;"Enter new file name"
   1 ;"Enter file name":
   1 ;"9..return to main menu"
   1 ;"8..erase file from microdrive"
   1 ;"8....other facilities"
   1 ;"8....black";
   1 ;"7..erase file from RAM"
   1 ;"7...return to main menu"
   1 ;"7....white";
   1 ;"7....printout"
   1 ;"6..save to microdrive"
   1 ;"6...cataloge microdrive"
   1 ;"6....yellow"
   1 ;"6....sort"
   1 ;"5..save to RAM"
   1 ;"5...cataloge RAM"
   1 ;"5...4800 baud"
   1 ;"5....file and retrieve"
   1 ;"5....cyan";
   1 ;"4..save to tape"
   1 ;"4..return to main menu"
   1 ;"4...return to main menu"
   1 ;"4...change file password"
   1 ;"4...2400 baud"
   1 ;"4....search facilities"
   1 ;"4....green";
   1 ;"3..set baud rate"
   1 ;"3..load from microdrive"
   1 ;"3...delete a record"
   1 ;"3...change paper, ink colours"
   1 ;"3...1200 baud"
   1 ;"3....view facilities"
   1 ;"3....return to main menu"
   1 ;"3....magenta"
   1 ;"2..printout seperate fields"
   1 ;"2..load from RAM"
   1 ;"2...view seperate fields"
   1 ;"2...search seperate fields"
   1 ;"2...file information"
   1 ;"2...amend a record"
   1 ;"2....start new file"
   1 ;"2....sort from Z-A,9-1"
   1 ;"2....red";
   1 ;"2....600 baud"
   1 ;"1..printout whole records"
   1 ;"1..load from tape"
   1 ;"1...view whole records"
   1 ;"1...search whole records"
   1 ;"1...change current file name"
   1 ;"1...add a record"
   1 ;"1....transactions"
   1 ;"1....sort from 1-9,A-Z"
   1 ;"1....blue";
   1 ;"1....300 baud"
   1 ,c$(i);": ";d$(n,k(i)
   1 ,"record ";n
   1 ,"Record";
   1 "superfile"
   1 "search word":
   1 "record ";j;" deleted"
   1 "record ";i;"  field ";n
   1 "press any key"
   1 "press any key for next copy":
   1 "number of fields= ":
   1 "insert tape for master copy     then press ENTER"
   1 "field ";n;"  ";c$(n):
   1 "field ";n:
   1 "field   field name":
   1 "field   field name   size":
   1 "enter search word"
   1 "enter ink colour"
   1 "enter highlight paper colour"
   1 "enter field number":
   1 "enter ";c$(n):
   1 "are you sure ? (y/n)"
   1 "amend record in ";i$
   1 "a....to alter record number"
   1 "View whole of ";i$:
   1 "View field of ";i$:
   1 "This will be record ";k(13
   1 "Set baud rate for printout"
   1 "Search whole records"
   1 "Search seperate field":
   1 "Search field ";
   1 "Save data file to tape"
   1 "Save data file to microdrive"
   1 "Save data file to RAM"
   1 "Printout whole records"
   1 "Printout seperate fields":
   1 "No. records remaining = ";k(12
   1 "Max number of records = ";k(12
   1 "Load data file from tape"
   1 "Load data file from microdrive"
   1 "Load data file from RAM"
   1 "Information on file ";
   1 "Incorrect, please try again";
   1 "Erase file from microdrive"
   1 "Erase file from RAM"
   1 "ENTER PASSWORD":
   1 "Do you want to proceed ?"
   1 "Delete record from ":
   1 "Decending sort on ";i$:
   1 "Change paper and ink colours"
   1 "Catalogue of microdrive"
   1 "Cataloge of RAM"
   1 "Ascending sort on ";i$:
   1 "Add record to ";i$:
   1 " x      "
   1 "     No. records used = ";k(13